package com.tdx.blog_nowcoder.utils;

import org.apache.commons.lang3.CharUtils;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.stereotype.Component;

import javax.annotation.PostConstruct;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.util.HashMap;
import java.util.Map;

@Component
public class SensitiveFilter {

    private final Logger logger = LoggerFactory.getLogger(SensitiveFilter.class);
    private static final String REPLACEMENT = "***";
    private TrieNode rootNode = new TrieNode();
    private class TrieNode{
        private boolean isKeywordEnd = false;
        private Map<Character,TrieNode> subNodes = new HashMap<>();

        public boolean isKeywordEnd() {
            return isKeywordEnd;
        }

        public void setKeywordEnd(boolean keywordEnd) {
            isKeywordEnd = keywordEnd;
        }

        public void setSubNodes(Character c,TrieNode trieNode){
            subNodes.put(c,trieNode);
        }
        public TrieNode getSubNode(Character c){
            return subNodes.get(c);
        }
    }

    @PostConstruct
    public void init(){
        try(
                InputStream is = this.getClass().getClassLoader().getResourceAsStream("sensitive-filter.txt");
                BufferedReader bufferedReader = new BufferedReader(new InputStreamReader(is));
        ) {
            String keyword;
            while ((keyword = bufferedReader.readLine())!=null){ //
                // 添加到前缀树
                this.addKeyword(keyword);
            }

        } catch (IOException e) {
            logger.error("加载敏感资源词库失败！"+e.getMessage());
        }
    }

    private void addKeyword(String keyword) {
        // 空值判断
        if (StringUtils.isBlank(keyword)||StringUtils.isEmpty(keyword)){
            return;
        }
        TrieNode tmpNode = rootNode;
        //遍历所有字符，添加到树中
        char[] keychar = keyword.toCharArray();
        for(int i=0;i<keychar.length;i++){
                char c = keychar[i];
                TrieNode subNode = tmpNode.getSubNode(c);
                if(subNode==null){
                    subNode = new TrieNode();
                    tmpNode.setSubNodes(c,subNode);
                }
                tmpNode = subNode;
                if(i==keychar.length-1){
                    tmpNode.setKeywordEnd(true);
                }
        }

    }

    // 判断是否为符号
    private boolean isSymbol(Character c) {
        // 0x2E80~0x9FFF 是东亚文字范围
        return !CharUtils.isAsciiAlphanumeric(c) && (c < 0x2E80 || c > 0x9FFF);
    }


    public String filter(String text){
        // 空值判断
        if (StringUtils.isEmpty(text)||StringUtils.isBlank(text)){
            return null;
        }
        // 不为空的情况，开始对文本进行过滤处理；用三个指针，分别指向的是前缀树、文本；
        // 在文本中，相当于用双指针，找到前缀树中出现的路径，然后对双指针指向的区域进行文本替换
        TrieNode tempNode= rootNode; // 指针 1
        int begin=0,position=0;  // 指针2 3
        // 结果
        StringBuilder sb=new StringBuilder();


        while(position < text.length()){

            Character c = text.charAt(position);

            // 跳过符号
            if (isSymbol(c)) {
                if (tempNode == rootNode) {
                    begin++;
                    sb.append(c);
                }
                position++;
                continue;
            }
            // 检查下级节点
            tempNode = tempNode.getSubNode(c);
            if (tempNode == null) {
                // 以begin开头的字符串不是敏感词
                sb.append(text.charAt(begin));
                // 进入下一个位置
                position = ++begin;
                // 重新指向根节点
                tempNode = rootNode;
            }
            // 发现敏感词
            else if (tempNode.isKeywordEnd()) {
                sb.append(REPLACEMENT);
                begin = ++position;
            }
            // 检查下一个字符
            else {
                position++;
            }

            // 提前判断postion是不是到达结尾，要跳出while,如果是，则说明begin-position这个区间不是敏感词，但是里面不一定没有
            if (position==text.length() && begin!=position){
                // 说明还剩下一段需要判断，则把position==++begin
                // 并且当前的区间的开头字符是合法的
                sb.append(text.charAt(begin));
                position=++begin;
                tempNode=rootNode;  // 前缀表从头开始了
            }
        }
        return sb.toString();
    }

}
